home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 1 / Cream of the Crop 1.iso / PROGRAM / DJLSR106.ARJ / ISCTYPE.C < prev    next >
C/C++ Source or Header  |  1992-03-02  |  3KB  |  129 lines
  1. /* This is file ISCTYPE.C */
  2. /* This file may have been modified by DJ Delorie (Jan 1991).  If so,
  3. ** these modifications are Coyright (C) 1991 DJ Delorie, 24 Kirsten Ave,
  4. ** Rochester NH, 03867-2954, USA.
  5. */
  6.  
  7. /*
  8.  * Copyright (c) 1989 The Regents of the University of California.
  9.  * All rights reserved.
  10.  *
  11.  * Redistribution and use in source and binary forms are permitted
  12.  * provided that: (1) source distributions retain this entire copyright
  13.  * notice and comment, and (2) distributions including binaries display
  14.  * the following acknowledgement:  ``This product includes software
  15.  * developed by the University of California, Berkeley and its contributors''
  16.  * in the documentation or other materials provided with the distribution
  17.  * and in all advertising materials mentioning features or use of this
  18.  * software. Neither the name of the University nor the names of its
  19.  * contributors may be used to endorse or promote products derived
  20.  * from this software without specific prior written permission.
  21.  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  22.  * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  23.  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  24.  */
  25.  
  26. #if defined(LIBC_SCCS) && !defined(lint)
  27. static char sccsid[] = "@(#)isctype.c    5.2 (Berkeley) 6/1/90";
  28. #endif /* LIBC_SCCS and not lint */
  29.  
  30. #define _ANSI_LIBRARY
  31. #include <ctype.h>
  32.  
  33. #undef isalnum
  34. isalnum(c)
  35.     int c;
  36. {
  37.     return((_ctype_ + 1)[c] & (_U|_L|_N));
  38. }
  39.  
  40. #undef isalpha
  41. isalpha(c)
  42.     int c;
  43. {
  44.     return((_ctype_ + 1)[c] & (_U|_L));
  45. }
  46.  
  47. #undef iscntrl
  48. iscntrl(c)
  49.     int c;
  50. {
  51.     return((_ctype_ + 1)[c] & _C);
  52. }
  53.  
  54. #undef isdigit
  55. isdigit(c)
  56.     int c;
  57. {
  58.     return((_ctype_ + 1)[c] & _N);
  59. }
  60.  
  61. #undef isgraph
  62. isgraph(c)
  63.     int c;
  64. {
  65.     return((_ctype_ + 1)[c] & (_P|_U|_L|_N));
  66. }
  67.  
  68. #undef islower
  69. islower(c)
  70.     int c;
  71. {
  72.     return((_ctype_ + 1)[c] & _L);
  73. }
  74.  
  75. #undef isprint
  76. isprint(c)
  77.     int c;
  78. {
  79.     return((_ctype_ + 1)[c] & (_P|_U|_L|_N|_B));
  80. }
  81.  
  82. #undef ispunct
  83. ispunct(c)
  84.     int c;
  85. {
  86.     return((_ctype_ + 1)[c] & _P);
  87. }
  88.  
  89. #undef isspace
  90. isspace(c)
  91.     int c;
  92. {
  93.     return((_ctype_ + 1)[c] & _S);
  94. }
  95.  
  96. #undef isupper
  97. isupper(c)
  98.     int c;
  99. {
  100.     return((_ctype_ + 1)[c] & _U);
  101. }
  102.  
  103. #undef isxdigit
  104. isxdigit(c)
  105.     int c;
  106. {
  107.     return((_ctype_ + 1)[c] & (_N|_X));
  108. }
  109.  
  110. #undef tolower
  111. tolower(c)
  112.     int c;
  113. {
  114.   if ((c >= 'A') && (c <= 'Z'))
  115.     return((c) - 'A' + 'a');
  116.   else
  117.     return c;
  118. }
  119.  
  120. #undef toupper
  121. toupper(c)
  122.     int c;
  123. {
  124.   if ((c >= 'a') && (c <= 'z'))
  125.     return((c) - 'a' + 'A');
  126.   else
  127.     return c;
  128. }
  129.